home *** CD-ROM | disk | FTP | other *** search
/ Colson Caster Selection Guide 3 / Colson Caster Selection Guide 3.0.iso / data1.cab / Program_Executable_Files / colsoncd.dxr / Intro_24_bcast.ls < prev    next >
Encoding:
Text File  |  2000-01-12  |  1.2 KB  |  34 lines
  1. on mouseUp
  2.   puppetTransition(47, 1, 8)
  3.   puppetSound("mainsnd")
  4.   put EMPTY into field "sermodnum"
  5.   put EMPTY into field "diamodnum"
  6.   put EMPTY into field "mtmodnum"
  7.   put EMPTY into field "whmodnum"
  8.   put EMPTY into field "bemodnum"
  9.   put EMPTY into field "comodnum"
  10.   put EMPTY into field "whexmodnum"
  11.   put EMPTY into field "modnum"
  12.   set the hilite of cast "Brick" to 0
  13.   set the hilite of cast "Wood" to 0
  14.   set the hilite of cast "Concrete" to 0
  15.   set the hilite of cast "SmoothSteel" to 0
  16.   set the hilite of cast "Linoleum" to 0
  17.   set the hilite of cast "RibbedSteel" to 0
  18.   set the hilite of cast "Asphalt" to 0
  19.   set the hilite of cast "Tile" to 0
  20.   set the hilite of cast "Carpet" to 0
  21.   set the hilite of cast "Terrazzo" to 0
  22.   set the hilite of cast "Water" to 0
  23.   set the hilite of cast "Steam" to 0
  24.   set the hilite of cast "MildChemicals" to 0
  25.   set the hilite of cast "ExtremeTemp" to 0
  26.   set the hilite of cast "OilGrease" to 0
  27.   set the hilite of cast "NoiseReduction" to 0
  28.   set the hilite of cast "MetalChips" to 0
  29.   set the hilite of cast "FloorProtection" to 0
  30.   set the hilite of cast "AnimalFats" to 0
  31.   set the hilite of cast "CushionLoad" to 0
  32.   play frame "casters"
  33. end
  34.